home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-01
/
wlib11_2.zip
/
EXAMPLES.EXE
/
EXAM33.C
< prev
next >
Wrap
C/C++ Source or Header
|
1991-03-13
|
586b
|
21 lines
#include "window.h"
#define NORM CREATE_VIDEO_ATTRIBUTE(black,white)
#define REDONWHITE CREATE_VIDEO_ATTRIBUTE(red,white)
WPOINTER w;
main()
{
int i;
WindowInitializeSystem();
WindowSaveInitial(0);
w = WindowInitialize(BORDER,1,1,20,10,NORM,NORM,SINGLEBOX);
WindowOpen(w);
WindowDisplay(w,1,NOEFFECT);
for (i=0;i<10;i++)
WindowWriteRepeatCharacter(w,'A'+i,i+1,1,20);
GET_KEY();
WindowScrollRegionAttr(w,1,3,5,6,15,UP,REDONWHITE);
GET_KEY();
WindowScrollRegionAttr(w,3,8,4,10,12,DOWN,REDONWHITE);
}